home *** CD-ROM | disk | FTP | other *** search
/ Maximum CD 2004 September / maximum-cd-2004-09.iso / Software / Apps / CorelDRAWGraphicsSuite12.exe / CorelDRAW Graphics Suite 12.msi / Binary.NewBinary28 < prev    next >
Encoding:
Text File  |  2004-01-07  |  35.9 KB  |  595 lines
  1. Const msiNoAction = -1
  2. Const msiInstallStateAdvertise = 1
  3. Const msiInstallStateAbsent = 2
  4. Const msiInstallStateLocal = 3
  5. Const msiInstallStateSource = 4
  6. Const msiInstallStateDefault = 5
  7.  
  8. On Error Resume Next
  9.  
  10. If (IsFeatureSelected("FontNav") = True) Then
  11.    If ((Session.Property("PLLANG") = "1") And (Session.Property("CZLANG") <> "1") And _ 
  12.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  13.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  14.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  15.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  16.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  17.     (Session.Property("ENLANG") <> "1")) Then
  18.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateLocal
  19.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  20.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  21.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  22.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  23.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  24.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  25.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  26.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  27.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  28.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  29.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  30.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  31.  
  32.   Elseif ((Session.Property("CZLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  33.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  34.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  35.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  36.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  37.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  38.     (Session.Property("ENLANG") <> "1")) Then
  39.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateLocal
  40.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  41.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  42.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  43.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  44.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  45.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  46.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  47.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  48.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  49.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  50.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  51.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  52.  
  53.  
  54.   Elseif ((Session.Property("NLLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  55.     (Session.Property("CZLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  56.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  57.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  58.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  59.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  60.     (Session.Property("ENLANG") <> "1")) Then
  61.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateLocal
  62.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  63.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  64.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  65.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  66.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  67.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  68.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  69.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  70.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  71.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  72.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  73.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  74.  
  75.  
  76.   Elseif ((Session.Property("KOLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  77.     (Session.Property("NLLANG") <> "1") And (Session.Property("CZLANG") <> "1") And _
  78.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  79.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  80.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  81.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  82.     (Session.Property("ENLANG") <> "1")) Then
  83.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateLocal
  84.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  85.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  86.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  87.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  88.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  89.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  90.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  91.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  92.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  93.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  94.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  95.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  96.  
  97.  
  98.   Elseif ((Session.Property("CTLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  99.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  100.     (Session.Property("CZLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  101.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  102.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  103.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  104.     (Session.Property("ENLANG") <> "1")) Then
  105.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateLocal
  106.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  107.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  108.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  109.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  110.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  111.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  112.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  113.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  114.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  115.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  116.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  117.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  118.  
  119.  
  120.   Elseif ((Session.Property("CSLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  121.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  122.     (Session.Property("CTLANG") <> "1") And (Session.Property("CZLANG") <> "1") And _
  123.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  124.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  125.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  126.     (Session.Property("ENLANG") <> "1")) Then
  127.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateLocal
  128.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  129.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  130.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  131.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  132.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  133.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  134.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  135.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  136.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  137.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  138.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  139.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  140.  
  141.  
  142.   Elseif ((Session.Property("BPLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  143.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  144.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  145.     (Session.Property("CZLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  146.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  147.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  148.     (Session.Property("ENLANG") <> "1")) Then
  149.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateLocal
  150.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  151.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  152.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  153.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  154.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  155.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  156.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  157.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  158.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  159.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  160.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  161.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  162.  
  163.  
  164.   Elseif ((Session.Property("ESLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  165.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  166.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  167.     (Session.Property("BPLANG") <> "1") And (Session.Property("CZLANG") <> "1") And _
  168.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  169.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  170.     (Session.Property("ENLANG") <> "1")) Then
  171.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateLocal
  172.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  173.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  174.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  175.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  176.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  177.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  178.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  179.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  180.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  181.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  182.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  183.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  184.  
  185.  
  186.   Elseif ((Session.Property("ITLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  187.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  188.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  189.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  190.     (Session.Property("CZLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  191.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  192.     (Session.Property("ENLANG") <> "1")) Then
  193.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateLocal
  194.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  195.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  196.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  197.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  198.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  199.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  200.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  201.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  202.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  203.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  204.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  205.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  206.  
  207.  
  208.   Elseif ((Session.Property("JPLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  209.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  210.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  211.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  212.     (Session.Property("ITLANG") <> "1") And (Session.Property("CZLANG") <> "1") And _
  213.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  214.     (Session.Property("ENLANG") <> "1")) Then
  215.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateLocal
  216.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  217.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  218.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  219.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  220.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  221.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  222.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  223.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  224.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  225.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  226.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  227.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  228.  
  229.  
  230.   Elseif ((Session.Property("FRLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  231.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  232.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  233.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  234.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  235.     (Session.Property("CZLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  236.     (Session.Property("ENLANG") <> "1")) Then
  237.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateLocal
  238.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  239.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  240.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  241.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  242.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  243.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  244.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  245.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  246.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  247.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  248.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  249.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  250.  
  251.  
  252.   Elseif ((Session.Property("DELANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  253.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  254.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  255.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  256.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  257.     (Session.Property("FRLANG") <> "1") And (Session.Property("CZLANG") <> "1") And _
  258.     (Session.Property("ENLANG") <> "1")) Then
  259.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateLocal
  260.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  261.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  262.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  263.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  264.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  265.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  266.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  267.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  268.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  269.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  270.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  271.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  272.  
  273.  
  274.   Elseif ((Session.Property("ENLANG") = "1") And (Session.Property("PLLANG") <> "1") And _ 
  275.     (Session.Property("NLLANG") <> "1") And (Session.Property("KOLANG") <> "1") And _
  276.     (Session.Property("CTLANG") <> "1") And (Session.Property("CSLANG") <> "1") And _
  277.     (Session.Property("BPLANG") <> "1") And (Session.Property("ESLANG") <> "1") And _
  278.     (Session.Property("ITLANG") <> "1") And (Session.Property("JPLANG") <> "1") And _
  279.     (Session.Property("FRLANG") <> "1") And (Session.Property("DELANG") <> "1") And _
  280.     (Session.Property("CZLANG") <> "1")) Then
  281.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateLocal
  282.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  283.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  284.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  285.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  286.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  287.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  288.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  289.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  290.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  291.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  292.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  293.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  294.  
  295.   Else
  296.     If (Session.Property("OSLANGUAGE") = "US") Then
  297.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateLocal
  298.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  299.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  300.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  301.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  302.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  303.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  304.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  305.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  306.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  307.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  308.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  309.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  310.     
  311.     ElseIf (Session.Property("OSLANGUAGE") = "DE") Then
  312.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateLocal
  313.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  314.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  315.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  316.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  317.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  318.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  319.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  320.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  321.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  322.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  323.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  324.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  325.  
  326.     ElseIf (Session.Property("OSLANGUAGE") = "FR") Then
  327.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateLocal
  328.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  329.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  330.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  331.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  332.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  333.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  334.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  335.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  336.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  337.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  338.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  339.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  340.  
  341.     ElseIf (Session.Property("OSLANGUAGE") = "ES") Then
  342.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateLocal
  343.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  344.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  345.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  346.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  347.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  348.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  349.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  350.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  351.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  352.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  353.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  354.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  355.  
  356.     Elseif (Session.Property("OSLANGUAGE") = "IT") Then
  357.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateLocal
  358.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  359.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  360.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  361.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  362.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  363.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  364.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  365.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  366.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  367.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  368.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  369.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  370.  
  371.     Elseif (Session.Property("OSLANGUAGE") = "BR") Then
  372.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateLocal
  373.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  374.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  375.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  376.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  377.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  378.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  379.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  380.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  381.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  382.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  383.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  384.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  385.  
  386.     Elseif (Session.Property("OSLANGUAGE") = "JP") Then
  387.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateLocal
  388.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  389.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  390.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  391.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  392.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  393.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  394.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  395.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  396.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  397.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  398.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  399.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  400.  
  401.     Elseif (Session.Property("OSLANGUAGE") = "CS") Then
  402.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateLocal
  403.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  404.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  405.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  406.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  407.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  408.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  409.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  410.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  411.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  412.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  413.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  414.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  415.  
  416.     Elseif (Session.Property("OSLANGUAGE") = "CT") Then
  417.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateLocal
  418.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  419.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  420.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  421.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  422.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  423.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  424.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  425.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  426.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  427.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  428.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  429.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  430.  
  431.     Elseif (Session.Property("OSLANGUAGE") = "CZ") Then
  432.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateLocal
  433.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  434.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  435.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  436.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  437.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  438.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  439.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  440.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  441.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  442.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  443.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  444.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  445.  
  446.     Elseif (Session.Property("OSLANGUAGE") = "PL") Then
  447.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateLocal
  448.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  449.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  450.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  451.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  452.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  453.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  454.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  455.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  456.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  457.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  458.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  459.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  460.  
  461.     Elseif (Session.Property("OSLANGUAGE") = "NL") Then
  462.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateLocal
  463.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  464.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  465.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  466.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  467.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  468.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  469.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  470.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  471.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  472.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  473.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  474.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  475.  
  476.     Elseif (Session.Property("OSLANGUAGE") = "KR") Then
  477.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateLocal
  478.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  479.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  480.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  481.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  482.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  483.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  484.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  485.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  486.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  487.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  488.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  489.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  490.  
  491.     Else     
  492.         Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateLocal
  493.         Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  494.         Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  495.         Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  496.         Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  497.         Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  498.         Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  499.         Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  500.         Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  501.         Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  502.         Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  503.         Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  504.         Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  505.  
  506.     End If
  507.   End If
  508. Else
  509.     Session.FeatureRequestState("FontnavHelpPL") = msiInstallStateAbsent
  510.     Session.FeatureRequestState("FontnavHelpEN") = msiInstallStateAbsent
  511.     Session.FeatureRequestState("FontnavHelpDE") = msiInstallStateAbsent
  512.     Session.FeatureRequestState("FontnavHelpFR") = msiInstallStateAbsent
  513.     Session.FeatureRequestState("FontnavHelpES") = msiInstallStateAbsent
  514.     Session.FeatureRequestState("FontnavHelpIT") = msiInstallStateAbsent
  515.     Session.FeatureRequestState("FontnavHelpBR") = msiInstallStateAbsent
  516.     Session.FeatureRequestState("FontnavHelpJP") = msiInstallStateAbsent
  517.     Session.FeatureRequestState("FontnavHelpCZ") = msiInstallStateAbsent
  518.     Session.FeatureRequestState("FontnavHelpCS") = msiInstallStateAbsent
  519.     Session.FeatureRequestState("FontnavHelpCT") = msiInstallStateAbsent
  520.     Session.FeatureRequestState("FontnavHelpNL") = msiInstallStateAbsent
  521.     Session.FeatureRequestState("FontnavHelpKR") = msiInstallStateAbsent
  522. End If
  523.  
  524.  
  525. '///////////////////////////////////////////////////////////////////////////
  526. Function IsFeatureExists(sFeature)
  527. On Error Resume Next
  528.  
  529.     Dim objDB: Set objDB = Session.Database
  530.  
  531.     Dim sQuery: sQuery = "SELECT * FROM `Feature` WHERE `Feature`.`Feature` = '" & sFeature & "'"
  532.  
  533.     Dim objView: Set objView = objDB.OpenView(sQuery)
  534.     objView.Execute
  535.  
  536.     Dim objRec: Set objRec = objView.Fetch
  537.  
  538.     If (objRec Is Nothing) Then
  539.         ' not there
  540.         IsFeatureExists = 0
  541.     Else
  542.         ' there
  543.         IsFeatureExists = 1
  544.     End If
  545.  
  546. End Function
  547.  
  548. '*********************************************************************************************
  549. '    Function:    getFeatureAction(sFeature)
  550. '
  551. '    Args:        STRING sFeature = `Feature`.`Feature`
  552. '
  553. '    Returns:    The current install state of the feature
  554. '
  555. '*********************************************************************************************
  556. Function getFeatureState(sFeature)
  557. On Error Resume Next
  558.     getFeatureState = Session.FeatureCurrentState(sFeature)
  559. End Function
  560.  
  561. '*********************************************************************************************
  562. '    Function:    getFeatureAction(sFeature)
  563. '
  564. '    Args:        STRING sFeature = `Feature`.`Feature`
  565. '
  566. '    Returns:    The requested action of the feature
  567. '
  568. '*********************************************************************************************
  569. Function getFeatureAction(sFeature)
  570. On Error Resume Next
  571.     getFeatureAction = Session.FeatureRequestState(sFeature)
  572. End Function
  573.  
  574.  
  575. '*********************************************************************************************
  576. '    Function:    IsFeatureSelected(sFeature)
  577. '
  578. '    Args:        STRING sFeature = `Feature`.`Feature`
  579. '
  580. '    Returns:    True \ False
  581. '
  582. '    Notes:        Determines if a feature is selected for install
  583. '*********************************************************************************************
  584. Function IsFeatureSelected(sFeature)
  585. On Error Resume Next
  586.     Dim nState: nState = getFeatureState(sFeature)
  587.     Dim nAction: nAction = getFeatureAction(sFeature)
  588.  
  589.     If ((nAction > msiInstallStateAbsent) Or ((nState > msiInstallStateAbsent) And (nAction = msiNoAction))) Then
  590.         IsFeatureSelected = True
  591.     Else
  592.         IsFeatureSelected = False
  593.     End If
  594.  
  595. End Function